home *** CD-ROM | disk | FTP | other *** search
/ William Shakespeare - The Complete Works / William Shakespeare - The Complete Works on CD-ROM.iso / library / dgw / dgw2and.bas < prev    next >
Encoding:
BASIC Source File  |  1994-06-29  |  221 b   |  13 lines
  1. OPEN "text.dgw" FOR INPUT AS #1
  2. OPEN "text.and" FOR OUTPUT AS #2
  3. DO
  4. LINE INPUT #1, a$
  5. LINE INPUT #1, t$
  6. LINE INPUT #1, te$
  7. PRINT #2, a$
  8. PRINT #2, "OBJECTYPE_TEXT"
  9. PRINT #2, t$
  10. PRINT #2, te$
  11. LOOP UNTIL EOF(1)
  12.  
  13.